www.gusucode.com > 星梦奇缘交友网 1 > 星梦奇缘交友网 1.0源码程序/love/leaveword/admin_config.asp
<!-- #include file="config.asp" -->
<!-- #include file="style.asp" -->
<!-- #include file="admin_verify.asp" -->
<%Response.Expires=-1%>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=HomeName%> 留言本 留言本参数</title></head><body<%=bodylimit%> onload="<%=framecheck%>">
<div align="<%=TableAlign%>">
<table border="<%=TableBorderWidth%>" cellpadding="2" style="border-collapse:collapse" width="<%=TableWidth%>" bordercolor="<%=TableBorderColor%>"><tr><td>
<!-- #include file="admintitle.inc" -->
<!-- #include file="admintool.inc" -->
<%
set cn=server.CreateObject("ADODB.Connection")
set rs=server.CreateObject("ADODB.Recordset")
CreateConn cn,dbtype
rs.Open "SELECT * FROM config",cn
%>
<br>
<table border="1" cellpadding="2" style="border-collapse:collapse" width="100%" bordercolor="<%=TableBorderColor%>">
<tr height="25" align="center">
<td background="<%=TableTitlePic%>" bgcolor="<%=TableTitleBGC%>"><font color="<%=TableTitleColor%>"><b>留言本参数设置</b></font></td>
</tr>
<tr><td bgcolor="<%=TableContentBGC%>" align="left"><font color="<%=TableContentColor%>">
<table border="1" bordercolor="<%=TableBorderColor%>" width="100%" style="border-collapse:collapse">
<tr align="center" style="cursor:hand">
<td width="20%" onclick="window.location='admin_config.asp?page=1'" onmouseover="this.firstChild.style.textDecoration='underline'" onmouseout="this.firstChild.style.textDecoration=''"><a href="admin_config.asp?page=1" onmouseover="return true;">[基本配置]</a></td>
<td width="20%" onclick="window.location='admin_config.asp?page=2'" onmouseover="this.firstChild.style.textDecoration='underline'" onmouseout="this.firstChild.style.textDecoration=''"><a href="admin_config.asp?page=2" onmouseover="return true;">[邮件通知]</a></td>
<td width="20%" onclick="window.location='admin_config.asp?page=4'" onmouseover="this.firstChild.style.textDecoration='underline'" onmouseout="this.firstChild.style.textDecoration=''"><a href="admin_config.asp?page=4" onmouseover="return true;">[界面尺寸]</a></td>
<td width="20%" onclick="window.location='admin_config.asp?page=8'" onmouseover="this.firstChild.style.textDecoration='underline'" onmouseout="this.firstChild.style.textDecoration=''"><a href="admin_config.asp?page=8" onmouseover="return true;">[功能设置]</a></td>
<td width="20%" onclick="window.location='admin_config.asp'" onmouseover="this.firstChild.style.textDecoration='underline'" onmouseout="this.firstChild.style.textDecoration=''"><a href="admin_config.asp" onmouseover="return true;">[全部参数]</a></td>
</tr>
</table>
<br>
<form method="post" action="admin_saveconfig.asp" name="configform" onsubmit="return check();">
<%
showpage=15
if isnumeric(Request.QueryString("page")) and len(Request.QueryString("page"))<=2 and Request.QueryString("page")<>"" then showpage=cint(Request.QueryString("page"))
if cint(showpage and 1)<> 0 then
%>
<b>基本配置：</b><br><br>
<%tstatus=rs("status")%>
留言本状态： <input type="radio" name="status1" value="1" id="status11"<%if cint(tstatus and 1)<>0 then Response.Write " checked"%>><label for="status11">开启</label> <input type="radio" name="status1" value="0" id="status12"<%if cint(tstatus and 1)=0 then Response.Write " checked"%>><label for="status12">关闭</label> (关闭时"访客留言权限"设置无效)<br><br>
访客留言权限： <input type="radio" name="status2" value="2" id="status21"<%if cint(tstatus and 2)<>0 then Response.Write " checked"%>><label for="status21">开启</label> <input type="radio" name="status2" value="0" id="status22"<%if cint(tstatus and 2)=0 then Response.Write " checked"%>><label for="status22">关闭</label><br><br>
访客搜索留言权限： <input type="radio" name="status3" value="4" id="status31"<%if cint(tstatus and 4)<>0 then Response.Write " checked"%>><label for="status31">开启</label> <input type="radio" name="status3" value="0" id="status32"<%if cint(tstatus and 4)=0 then Response.Write " checked"%>><label for="status32">关闭</label><br><br>
访客头像功能： <input type="radio" name="status7" value="8" id="status71"<%if cint(tstatus and 8)<>0 then Response.Write " checked"%>><label for="status71">开启</label> <input type="radio" name="status7" value="0" id="status72"<%if cint(tstatus and 8)=0 then Response.Write " checked"%>><label for="status72">关闭</label><br><br>
留言显示前需审核： <input type="radio" name="status4" value="16" id="status41"<%if cint(tstatus and 16)<>0 then Response.Write " checked"%>><label for="status41">审核</label> <input type="radio" name="status4" value="0" id="status42"<%if cint(tstatus and 16)=0 then Response.Write " checked"%>><label for="status42">不审核</label><br><br>
悄悄话功能： <input type="radio" name="status5" value="32" id="status51"<%if cint(tstatus and 32)<>0 then Response.Write " checked"%>><label for="status51">开启</label> <input type="radio" name="status5" value="0" id="status52"<%if cint(tstatus and 32)=0 then Response.Write " checked"%>><label for="status52">关闭</label><br><br>
访客为悄悄话加密： <input type="radio" name="status6" value="64" id="status61"<%if cint(tstatus and 64)<>0 then Response.Write " checked"%>><label for="status61">允许</label> <input type="radio" name="status6" value="0" id="status62"<%if cint(tstatus and 64)=0 then Response.Write " checked"%>><label for="status62">禁止</label><br><br>
所属网站Logo地址： <input type="text" size="<%=ConfigTextWidth%>" maxlength="255" name="homelogo" value="<%=rs("homelogo")%>"><br><br>
所属网站名称： <input type="text" size="<%=ConfigTextWidth%>" maxlength="48" name="homename" value="<%=rs("homename")%>"><br><br>
所属网站地址： <input type="text" size="<%=ConfigTextWidth%>" maxlength="255" name="homeaddr" value="<%=rs("homeaddr")%>"><br><br>
<%adminlimit=rs("adminhtml")%>
管理员默认HTML权限： <input type="checkbox" value="1" name="adminhtml" id="adminhtml"<%if cint(adminlimit and 1)<>0 then Response.Write " checked"%>><label for="adminhtml">管理员回复、公告默认支持HTML</label><br>
<input type="checkbox" value="1" name="adminubb" id="adminubb"<%if cint(adminlimit and 2)<>0 then Response.Write " checked"%>><label for="adminubb">管理员回复、公告默认支持UBB</label><br>
<input type="checkbox" value="1" name="adminertn" id="adminertn"<%if cint(adminlimit and 4)<>0 then Response.Write " checked"%>><label for="adminertn">管理员不支持HTML和UBB时，默认允许回车换行</label><br>
<input type="checkbox" value="1" name="adminviewcode" id="adminviewcode"<%if cint(adminlimit and 8)<>0 then Response.Write " checked"%>><label for="adminviewcode">为管理员显示访客实际HTML代码</label><br><br>
<%guestlimit=rs("guesthtml")%>
访客HTML权限： <input type="checkbox" value="1" name="guesthtml" id="guesthtml"<%if cint(guestlimit and 1)<>0 then Response.Write " checked"%>><label for="guesthtml">访客留言支持HTML</label><br>
<input type="checkbox" value="1" name="guestubb" id="guestubb"<%if cint(guestlimit and 2)<>0 then Response.Write " checked"%>><label for="guestubb">访客留言支持UBB</label><br>
<input type="checkbox" value="1" name="guestertn" id="guestertn"<%if cint(guestlimit and 4)<>0 then Response.Write " checked"%>><label for="guestertn">访客不支持HTML和UBB时，允许回车换行</label><br><br>
管理员登录超时： <input type="text" size="4" maxlength="4" name="admintimeout" value="<%=rs("admintimeout")%>">分 (默认=20)<br><br>
为访客显示IP前： <input type="text" size="4" maxlength="1" name="showip" value="<%=rs("showip")%>">位 (可选值：0～4)<br><br>
为管理员显示IP前： <input type="text" size="4" maxlength="1" name="adminshowip" value="<%=rs("adminshowip")%>">位 (可选值：0～4)<br><br>
为管理员显示原IP前： <input type="text" size="4" maxlength="1" name="adminshoworiginalip" value="<%=rs("adminshoworiginalip")%>">位 (可选值：0～4,使用代理服务器时此项显示原始IP)<br><br>
验证码长度： <input type="text" size="4" maxlength="2" name="vcodecount" value="<%=rs("vcodecount")%>">位 (可选值：0～10)<br><br><br>
<%
end if
if cint(showpage and 2)<> 0 then
%>
<%tmailflag=rs("mailflag")%>
<b>邮件通知：</b><br><br>
新留言到达通知： <input type="checkbox" value="1" name="mailnewinform" id="mailnewinform"<%if clng(tmailflag and 1)<>0 then Response.Write " checked"%>><label for="mailnewinform">启用</label><br><br>
版主回复通知选项： <input type="checkbox" value="1" name="mailreplyinform" id="mailreplyinform"<%if clng(tmailflag and 2)<>0 then Response.Write " checked"%>><label for="mailreplyinform">开启</label><br><br>
新留言通知接收地址： <input type="text" size="<%=ConfigTextWidth%>" maxlength="48" name="mailreceive" value="<%=rs("mailreceive")%>"><br><br>
发件人地址： <input type="text" size="<%=ConfigTextWidth%>" maxlength="48" name="mailfrom" value="<%=rs("mailfrom")%>"><br><br>
发件人SMTP服务器地址：<input type="text" size="<%=ConfigTextWidth%>" maxlength="48" name="mailsmtpserver" value="<%=rs("mailsmtpserver")%>"><br><br>
登录用户名(如需要)： <input type="text" size="<%=ConfigTextWidth%>" maxlength="48" name="mailuserid" value="<%=rs("mailuserid")%>"><br><br>
登录密码(如需要)： <input type="password" size="<%=ConfigTextWidth%>" maxlength="48" name="mailuserpass" value="<%=rs("mailuserpass")%>"><br><br>
邮件紧急程度： <input type="text" size="4" maxlength="1" name="maillevel" value="<%=rs("maillevel")%>"> (1最快～5最慢)<br><br><br>
<%end if
if cint(showpage and 4)<> 0 then
%>
<b>界面尺寸：</b><br><br>
字体名： <input type="text" size="10" maxlength="30" name="cssfontfamily" value="<%=rs("cssfontfamily")%>"><br><br>
字体大小： <input type="text" size="10" maxlength="30" name="cssfontsize" value="<%=rs("cssfontsize")%>"><br><br>
行间距： <input type="text" size="10" maxlength="30" name="csslineheight" value="<%=rs("csslineheight")%>"><br><br>
留言本总宽度： <input type="text" size="10" maxlength="5" name="tablewidth" value="<%=rs("tablewidth")%>"> (默认=630,可用百分比)<br><br>
留言本左窗格宽度： <input type="text" size="10" maxlength="5" name="tableleftwidth" value="<%=rs("tableleftwidth")%>"> (默认=150,可用百分比)<br><br>
“写留言”左文本宽度：<input type="text" size="10" maxlength="3" name="leaveleftwidth" value="<%=rs("leaveleftwidth")%>"> (默认=20,单位:字母宽度)<br><br>
“验证码”文本框宽度：<input type="text" size="10" maxlength="3" name="leavevcodewidth" value="<%=rs("leavevcodewidth")%>"> (默认=10,单位:字母宽度)<br><br>
“留言标题”文本宽度：<input type="text" size="10" maxlength="3" name="leavetitlewidth" value="<%=rs("leavetitlewidth")%>"> (默认=30,单位:字母宽度)<br><br>
“留言内容”文本宽度：<input type="text" size="10" maxlength="3" name="leavecontentwidth" value="<%=rs("leavecontentwidth")%>"> (默认=50,单位:字母宽度)<br><br>
“留言内容”文本高度：<input type="text" size="10" maxlength="3" name="leavecontentheight" value="<%=rs("leavecontentheight")%>"> (默认=7,单位:字母高度)<br><br>
“写留言”UBB 工具宽：<input type="text" size="10" maxlength="4" name="ubbtoolwidth" value="<%=rs("ubbtoolwidth")%>"> (默认=320,单位:象素)<br><br>
“写留言”UBB 工具高：<input type="text" size="10" maxlength="4" name="ubbtoolheight" value="<%=rs("ubbtoolheight")%>"> (默认=48,单位:象素)<br><br>
“留言搜索”文本宽度：<input type="text" size="10" maxlength="3" name="searchtextwidth" value="<%=rs("searchtextwidth")%>"> (默认=20,单位:字母宽度)<br><br>
“高级删除”中文本宽：<input type="text" size="10" maxlength="3" name="advdeltextwidth" value="<%=rs("advdeltextwidth")%>"> (默认=20,单位:字母宽度)<br><br>
“修改资料”中文本宽：<input type="text" size="10" maxlength="3" name="setinfotextwidth" value="<%=rs("setinfotextwidth")%>"> (默认=40,单位:字母宽度,包括密码框)<br><br>
“参数”中文本宽度： <input type="text" size="10" maxlength="3" name="configtextwidth" value="<%=rs("configtextwidth")%>"> (默认=75,单位:字母宽度,即"基本配置"页的文本)<br><br>
“内容过滤”中文本宽：<input type="text" size="10" maxlength="3" name="filtertextwidth" value="<%=rs("filtertextwidth")%>"> (默认=62,单位:字母宽度)<br><br>
回复、公告编辑框宽度：<input type="text" size="10" maxlength="3" name="replytextwidth" value="<%=rs("replytextwidth")%>"> (默认=98,单位:字母宽度)<br><br>
回复、公告编辑框高度：<input type="text" size="10" maxlength="3" name="replytextheight" value="<%=rs("replytextheight")%>"> (默认=10,单位:字母高度)<br><br>
每页显示的留言数： <input type="text" size="10" maxlength="5" name="itemsperpage" value="<%=rs("itemsperpage")%>"> (默认=5)<br><br>
头像每行显示的数目： <input type="text" size="10" maxlength="3" name="picturesperrow" value="<%=rs("picturesperrow")%>"> (默认=5)<br><br>
少量显示的头像数： <input type="text" size="10" maxlength="3" name="frequentfacecount" value="<%=rs("frequentfacecount")%>"> (默认=15,单击"更多头像"显示全部)<br><br><br>
<%
end if
if cint(showpage and 8)<> 0 then
%>
<b>功能设置：</b><br><br>
<%tvisualflag=rs("visualflag")%>
版主回复显示位置： <input type="radio" name="replyinword" value="1" id="replyinword1"<%if cint(tvisualflag and 1)<>0 then Response.Write " checked"%>><label for="replyinword1">内嵌于访客留言</label> <input type="radio" name="replyinword" value="0" id="replyinword2"<%if cint(tvisualflag and 1)=0 then Response.Write " checked"%>><label for="replyinword2">显示在访客留言下方</label><br><br>
UBB 工具栏： <input type="radio" name="showubbtool" value="1" id="showubbtool1"<%if cint(tvisualflag and 2)<>0 then Response.Write " checked"%>><label for="showubbtool1">显示</label> <input type="radio" name="showubbtool" value="0" id="showubbtool2"<%if cint(tvisualflag and 2)=0 then Response.Write " checked"%>><label for="showubbtool2">隐藏</label><br><br>
<%talign=rs("tablealign")%>
留言本对齐方式： <input type="radio" name="tablealign" value="left" id="align1"<%if talign<>"center" and talign<>"right" then Response.Write " checked"%>><label for="align1">左对齐</label> <input type="radio" name="tablealign" value="center" id="align2"<%if talign="center" then Response.Write " checked"%>><label for="align2">居中</label> <input type="radio" name="tablealign" value="right" id="align3"<%if talign="right" then Response.Write " checked"%>><label for="align3">右对齐</label><br><br>
<%tpagecontrol=rs("pagecontrol")%>
留言本边框线： <input type="radio" name="showborder" value="1" id="showborder1"<%if cint(tpagecontrol and 1)<>0 then Response.Write " checked"%>><label for="showborder1">显示</label> <input type="radio" name="showborder" value="0" id="showborder2"<%if cint(tpagecontrol and 1)=0 then Response.Write " checked"%>><label for="showborder2">隐藏</label><br><br>
留言本标题栏： <input type="radio" name="showtitle" value="1" id="showtitle1"<%if cint(tpagecontrol and 2)<>0 then Response.Write " checked"%>><label for="showtitle1">显示</label> <input type="radio" name="showtitle" value="0" id="showtitle2"<%if cint(tpagecontrol and 2)=0 then Response.Write " checked"%>><label for="showtitle2">隐藏</label><br><br>
网页右键菜单： <input type="radio" name="showcontext" value="1" id="showcontext1"<%if cint(tpagecontrol and 4)<>0 then Response.Write " checked"%>><label for="showcontext1">启用</label> <input type="radio" name="showcontext" value="0" id="showcontext2"<%if cint(tpagecontrol and 4)=0 then Response.Write " checked"%>><label for="showcontext2">禁用</label><br><br>
选择网页内容： <input type="radio" name="selectcontent" value="1" id="selectcontent1"<%if cint(tpagecontrol and 8)<>0 then Response.Write " checked"%>><label for="selectcontent1">允许</label> <input type="radio" name="selectcontent" value="0" id="selectcontent2"<%if cint(tpagecontrol and 8)=0 then Response.Write " checked"%>><label for="selectcontent2">禁止</label><br><br>
复制网页(Ctrl-C)： <input type="radio" name="copycontent" value="1" id="copycontent1"<%if cint(tpagecontrol and 16)<>0 then Response.Write " checked"%>><label for="copycontent1">允许</label> <input type="radio" name="copycontent" value="0" id="copycontent2"<%if cint(tpagecontrol and 16)=0 then Response.Write " checked"%>><label for="copycontent2">禁止</label><br><br>
被IFrame内嵌： <input type="radio" name="beframed" value="1" id="beframed1"<%if cint(tpagecontrol and 32)<>0 then Response.Write " checked"%>><label for="beframed1">允许</label> <input type="radio" name="beframed" value="0" id="beframed2"<%if cint(tpagecontrol and 32)=0 then Response.Write " checked"%>><label for="beframed2">禁止</label><br><br>
留言字数限制： <input type="text" size="10" maxlength="10" name="wordslimit" value="<%=rs("wordslimit")%>"> (0=不限,回车换行占2字,按UBB编码前统计)<br><br>
<%tdelconfirm=rs("delconfirm")%>
留言通过审核前提示： <input type="radio" name="passaudittip" value="1" id="passaudittip1"<%if cint(tdelconfirm and 16)<>0 then Response.Write " checked"%>><label for="passaudittip1">提示</label> <input type="radio" name="passaudittip" value="0" id="passaudittip2"<%if cint(tdelconfirm and 16)=0 then Response.Write " checked"%>><label for="passaudittip2">不提示</label><br><br>
选定留言通过审核提示：<input type="radio" name="passseltip" value="1" id="passseltip1"<%if cint(tdelconfirm and 32)<>0 then Response.Write " checked"%>><label for="passseltip1">提示</label> <input type="radio" name="passseltip" value="0" id="passseltip2"<%if cint(tdelconfirm and 32)=0 then Response.Write " checked"%>><label for="passseltip2">不提示</label><br><br>
删除留言时提示： <input type="radio" name="deltip" value="1" id="deltip1"<%if cint(tdelconfirm and 1)<>0 then Response.Write " checked"%>><label for="deltip1">提示</label> <input type="radio" name="deltip" value="0" id="deltip2"<%if cint(tdelconfirm and 1)=0 then Response.Write " checked"%>><label for="deltip2">不提示</label><br><br>
删除回复时提示： <input type="radio" name="delretip" value="1" id="delretip1"<%if cint(tdelconfirm and 2)<>0 then Response.Write " checked"%>><label for="delretip1">提示</label> <input type="radio" name="delretip" value="0" id="delretip2"<%if cint(tdelconfirm and 2)=0 then Response.Write " checked"%>><label for="delretip2">不提示</label><br><br>
删除选定留言时提示： <input type="radio" name="delseltip" value="1" id="delseltip1"<%if cint(tdelconfirm and 4)<>0 then Response.Write " checked"%>><label for="delseltip1">提示</label> <input type="radio" name="delseltip" value="0" id="delseltip2"<%if cint(tdelconfirm and 4)=0 then Response.Write " checked"%>><label for="delseltip2">不提示</label><br><br>
执行高级删除时提示： <input type="radio" name="deladvtip" value="1" id="deladvtip1"<%if cint(tdelconfirm and 8)<>0 then Response.Write " checked"%>><label for="deladvtip1">提示</label> <input type="radio" name="deladvtip" value="0" id="deladvtip2"<%if cint(tdelconfirm and 8)=0 then Response.Write " checked"%>><label for="deladvtip2">不提示</label><br><br>
留言本配色方案： <select name="style">
<%
stylename=rs("stylename")
rs.Close
rs.Open "SELECT stylename FROM style",cn
dim onestyle
while rs.EOF=false
onestyle=rs("stylename")
Response.Write "<option value=" &chr(34)& onestyle &chr(34)
if onestyle=stylename or stylename="" then Response.Write " selected"
Response.Write ">" &onestyle& "</option>"
rs.MoveNext
wend
%>
</select><br><br><br>
<%end if%>
<input type="hidden" name="page" value="<%=showpage%>">
<p align="center"><input value="更新数据" type="submit" name="submit1"></p>
</form>
<br>
</font></td></tr>
</table>
</td></tr></table></div>
<%
rs.Close
cn.Close
set rs=nothing
set cn=nothing
%>
<script language="JavaScript" defer>
<!--
function check()
{
var tv,showpage=<%=showpage%>;
if ((showpage & 1) != 0)
{
if (isNaN(tv=Number(document.configform.admintimeout.value)))
{alert('“管理员登录超时”必须为数字！');document.configform.admintimeout.select();return false;}
else if (tv<1 || tv>1440)
{alert('“管理员登录超时”必须在1～1440的范围内！');document.configform.admintimeout.select();return false;}
if (isNaN(tv=Number(document.configform.showip.value)))
{alert('“为访客显示IP”必须为数字');document.configform.showip.select();return false;}
else if (tv<0 || tv>4 || document.configform.showip.value=='')
{alert('“为访客显示IP”必须在0～4的范围内！');document.configform.showip.select();return false;}
if (isNaN(tv=Number(document.configform.adminshowip.value)))
{alert('“为管理员显示IP”必须为数字');document.configform.adminshowip.select();return false;}
else if (tv<0 || tv>4 || document.configform.adminshowip.value=='')
{alert('“为管理员显示IP”必须在0～4的范围内！');document.configform.adminshowip.select();return false;}
if (isNaN(tv=Number(document.configform.adminshoworiginalip.value)))
{alert('“为管理员显示原IP”必须为数字');document.configform.adminshoworiginalip.select();return false;}
else if (tv<0 || tv>4 || document.configform.adminshoworiginalip.value=='')
{alert('“为管理员显示原IP”必须在0～4的范围内！');document.configform.adminshoworiginalip.select();return false;}
if (isNaN(tv=Number(document.configform.vcodecount.value)))
{alert('“验证码长度”必须为数字！');document.configform.vcodecount.select();return false;}
else if (tv<0 || tv>10)
{alert('“验证码长度”必须在0～10的范围内！');document.configform.vcodecount.select();return false;}
}
if ((showpage & 2) != 0)
{
if (isNaN(tv=Number(document.configform.maillevel.value)))
{alert('“邮件紧急程度”必须为数字！');document.configform.maillevel.select();return false;}
else if (tv<1 || tv>5)
{alert('“邮件紧急程度”必须在1～5的范围内！');document.configform.maillevel.select();return false;}
}
if ((showpage & 4) != 0)
{
if (isNaN(tv=Number(document.configform.tablewidth.value)))
{if (/^\d+%$/.test(document.configform.tablewidth.value)==false) {alert('“留言本总宽度”必须为正数或正百分比！');document.configform.tablewidth.select();return false;}}
else if (tv<1)
{alert('“留言本总宽度”必须大于零！');document.configform.tablewidth.select();return false;}
if (isNaN(tv=Number(document.configform.tableleftwidth.value)))
{if (/^\d+%$/.test(document.configform.tableleftwidth.value)==false) {alert('“留言本左窗格宽度”必须为正数或正百分比！');document.configform.tableleftwidth.select();return false;}}
else if (tv<1)
{alert('“留言本左窗格宽度”必须大于零！');document.configform.tableleftwidth.select();return false;}
if (isNaN(tv=Number(document.configform.leaveleftwidth.value)))
{alert('“‘留言’左方文本宽度”必须为数字！');document.configform.leaveleftwidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘留言’左方文本宽度”必须在1～255的范围内！');document.configform.leaveleftwidth.select();return false;}
if (isNaN(tv=Number(document.configform.leavevcodewidth.value)))
{alert('“‘验证码’文本框宽度”必须为数字！');document.configform.leavevcodewidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘验证码’文本框宽度”必须在1～255的范围内！');document.configform.leavevcodewidth.select();return false;}
if (isNaN(tv=Number(document.configform.leavetitlewidth.value)))
{alert('“‘留言标题’文本宽度”必须为数字！');document.configform.leavetitlewidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘留言标题’文本宽度”必须在1～255的范围内！');document.configform.leavetitlewidth.select();return false;}
if (isNaN(tv=Number(document.configform.leavecontentwidth.value)))
{alert('“‘留言内容’文本宽度”必须为数字！');document.configform.leavecontentwidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘留言内容’文本宽度”必须在1～255的范围内！');document.configform.leavecontentwidth.select();return false;}
if (isNaN(tv=Number(document.configform.leavecontentheight.value)))
{alert('“‘留言内容’文本高度”必须为数字！');document.configform.leavecontentheight.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘留言内容’文本高度”必须在1～255的范围内！');document.configform.leavecontentheight.select();return false;}
if (isNaN(tv=Number(document.configform.ubbtoolwidth.value)))
{alert('“‘写留言’UBB工具宽”必须为数字！');document.configform.ubbtoolwidth.select();return false;}
else if (tv<1 || tv>9999)
{alert('“‘写留言’UBB工具宽”必须在1～9999的范围内！');document.configform.ubbtoolwidth.select();return false;}
if (isNaN(tv=Number(document.configform.ubbtoolheight.value)))
{alert('“‘写留言’UBB工具高”必须为数字！');document.configform.ubbtoolheight.select();return false;}
else if (tv<1 || tv>9999)
{alert('“‘写留言’UBB工具高”必须在1～9999的范围内！');document.configform.ubbtoolheight.select();return false;}
if (isNaN(tv=Number(document.configform.searchtextwidth.value)))
{alert('“‘留言搜索’文本宽度”必须为数字！');document.configform.searchtextwidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘留言搜索’文本宽度”必须在1～255的范围内！');document.configform.searchtextwidth.select();return false;}
if (isNaN(tv=Number(document.configform.advdeltextwidth.value)))
{alert('“‘高级删除’中文本宽”必须为数字！');document.configform.advdeltextwidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘高级删除’中文本宽”必须在1～255的范围内！');document.configform.advdeltextwidth.select();return false;}
if (isNaN(tv=Number(document.configform.setinfotextwidth.value)))
{alert('“‘修改资料’中文本宽”必须为数字！');document.configform.setinfotextwidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘修改资料’中文本宽”必须在1～255的范围内！');document.configform.setinfotextwidth.select();return false;}
if (isNaN(tv=Number(document.configform.configtextwidth.value)))
{alert('“‘参数’中文本宽度”必须为数字！');document.configform.configtextwidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘参数’中文本宽度”必须在1～255的范围内！');document.configform.configtextwidth.select();return false;}
if (isNaN(tv=Number(document.configform.filtertextwidth.value)))
{alert('“‘内容过滤’中文本宽”必须为数字！');document.configform.filtertextwidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“‘内容过滤’中文本宽”必须在1～255的范围内！');document.configform.filtertextwidth.select();return false;}
if (isNaN(tv=Number(document.configform.replytextwidth.value)))
{alert('“回复、公告编辑框宽度”必须为数字！');document.configform.replytextwidth.select();return false;}
else if (tv<1 || tv>255)
{alert('“回复、公告编辑框宽度”必须在1～255的范围内！');document.configform.replytextwidth.select();return false;}
if (isNaN(tv=Number(document.configform.replytextheight.value)))
{alert('“回复、公告编辑框高度”必须为数字！');document.configform.replytextheight.select();return false;}
else if (tv<1 || tv>255)
{alert('“回复、公告编辑框高度”必须在1～255的范围内！');document.configform.replytextheight.select();return false;}
if (isNaN(tv=Number(document.configform.itemsperpage.value)))
{alert('“每页显示的留言数”必须为数字！');document.configform.itemsperpage.select();return false;}
else if (tv<1 || tv>32767)
{alert('“每页显示的留言数”必须在1～32767的范围内！');document.configform.itemsperpage.select();return false;}
if (isNaN(tv=Number(document.configform.picturesperrow.value)))
{alert('“头像每行显示的数目”必须为数字！');document.configform.picturesperrow.select();return false;}
else if (tv<1 || tv>255)
{alert('“头像每行显示的数目”必须在1～255的范围内！');document.configform.picturesperrow.select();return false;}
if (isNaN(tv=Number(document.configform.frequentfacecount.value)))
{alert('“少量显示的头像数”必须为数字！');document.configform.frequentfacecount.select();return false;}
else if (tv<1 || tv>255)
{alert('“少量显示的头像数”必须在1～255的范围内！');document.configform.frequentfacecount.select();return false;}
}
if ((showpage & 8) != 0)
{
if (isNaN(tv=Number(document.configform.wordslimit.value)))
{alert('“留言字数限制”必须为数字！');document.configform.wordslimit.select();return false;}
else if (tv<0 || tv>2147483647 || document.configform.wordslimit.value=='')
{alert('“留言字数限制”必须在0～2147483647的范围内！');document.configform.wordslimit.select();return false;}
}
document.configform.submit1.disabled=true;
return true;
}
//-->
</script>
<!-- #include file="bottom.asp" -->
</body></html>